object Form1: TForm1 Left = 239 Top = 152 Width = 629 Height = 439 Caption = 'PowerPGP Message Encryptor (32-bit)' Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] Icon.Data = {} Menu = MainMenu1 Position = poScreenCenter OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnResize = FormResize PixelsPerInch = 96 TextHeight = 16 object Bevel1: TBevel Left = 0 Top = 24 Width = 621 Height = 349 Align = alClient Shape = bsFrame Style = bsRaised end object Label1: TLabel Left = 18 Top = 44 Width = 195 Height = 19 AutoSize = False Caption = 'Public Key To Use (To:)' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label2: TLabel Left = 18 Top = 84 Width = 163 Height = 17 AutoSize = False Caption = 'Message:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Image1: TImage Left = 568 Top = 28 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object Label4: TLabel Left = 418 Top = 28 Width = 150 Height = 33 Alignment = taRightJustify AutoSize = False Caption = 'Power PGP' Font.Color = clGray Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label5: TLabel Left = 414 Top = 26 Width = 150 Height = 33 Alignment = taRightJustify AutoSize = False Caption = 'Power PGP' Font.Color = clPurple Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Image2: TImage Left = 392 Top = 28 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object Panel1: TPanel Left = 32 Top = 288 Width = 558 Height = 68 BevelOuter = bvLowered BevelWidth = 4 TabOrder = 1 object BitBtn5: TBitBtn Left = 444 Top = 34 Width = 110 Height = 30 Hint = 'Exit the program' Caption = 'E&xit' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 9 OnClick = BitBtn5Click Kind = bkClose Style = bsNew end object BitBtn3: TBitBtn Left = 224 Top = 4 Width = 110 Height = 30 Hint = 'Cut message to clipboard' Caption = '&Cut Message' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = CutMessageToClipboard1Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333FF3333333333333003333333333333377F33333333333307 733333FFF333337773333C003333307733333777FF333777FFFFC0CC03330770 000077777FF377777777C033C03077FFFFF077FF77F777FFFFF7CC00000F7777 777077777777777777773CCCCC00000000003777777777777777333330030FFF FFF03333F77F7F3FF3F7333C0C030F00F0F03337777F7F77373733C03C030FFF FFF03377F77F7F3F333733C03C030F0FFFF03377F7737F733FF733C000330FFF 0000337777F37F3F7777333CCC330F0F0FF0333777337F737F37333333330FFF 0F03333333337FFF7F7333333333000000333333333377777733} NumGlyphs = 2 Style = bsNew end object BitBtn2: TBitBtn Left = 114 Top = 4 Width = 109 Height = 30 Hint = 'Decrypt current message' Caption = '&Decrypt' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = BitBtn2Click Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5000555555555555577755555555555550B0555555555555F7F7555555555550 00B05555555555577757555555555550B3B05555555555F7F557555555555000 3B0555555555577755755555555500B3B0555555555577555755555555550B3B 055555FFFF5F7F5575555700050003B05555577775777557555570BBB00B3B05 555577555775557555550BBBBBB3B05555557F555555575555550BBBBBBB0555 55557F55FF557F5555550BB003BB075555557F577F5575F5555577B003BBB055 555575F7755557F5555550BB33BBB0555555575F555557F555555507BBBB0755 55555575FFFF77555555555700007555555555577777755555550000} NumGlyphs = 2 Style = bsNew end object BitBtn1: TBitBtn Left = 4 Top = 4 Width = 109 Height = 30 Hint = 'Encrypt current message' Caption = '&Encrypt' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = BitBtn1Click Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300000000 0EEE333377777777777733330FF00FBFB0EE33337F37733F377733330F0BFB0B FB0E33337F73FF73337733330FF000BFBFB033337F377733333733330FFF0BFB FBF033337FFF733F333733300000BF0FBFB03FF77777F3733F37000FBFB0F0FB 0BF077733FF7F7FF7337E0FB00000000BF0077F377777777F377E0BFBFBFBFB0 F0F077F3333FFFF7F737E0FBFB0000000FF077F3337777777337E0BFBFBFBFB0 FFF077F3333FFFF73FF7E0FBFB00000F000077FF337777737777E00FBFBFB0FF 0FF07773FFFFF7337F37003000000FFF0F037737777773337F7333330FFFFFFF 003333337FFFFFFF7733333300000000033333337777777773330000} NumGlyphs = 2 Style = bsNew end object BitBtn4: TBitBtn Left = 334 Top = 4 Width = 110 Height = 30 Hint = 'Replace message with contents in clipboard' Caption = 'Paste &Message' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = PasteMessageFromClipboard1Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330FFFFF FFF03333337F3FFFF3F73333330F0000F0F03333337F777737373333330FFFFF FFF033FFFF7FFF33FFF77000000007F00000377777777FF777770BBBBBBBB0F0 FF037777777777F7F3730B77777BB0F0F0337777777777F7F7330B7FFFFFB0F0 0333777F333377F77F330B7FFFFFB0009333777F333377777FF30B7FFFFFB039 9933777F333377F777FF0B7FFFFFB0999993777F33337777777F0B7FFFFFB999 9999777F3333777777770B7FFFFFB0399933777FFFFF77F777F3070077007039 99337777777777F777F30B770077B039993377FFFFFF77F777330BB7007BB999 93337777FF777777733370000000073333333777777773333333} NumGlyphs = 2 Style = bsNew end object BitBtn6: TBitBtn Left = 4 Top = 34 Width = 109 Height = 30 Hint = 'Clear the message window' Caption = 'Clea&r' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 5 OnClick = ClearMessage1Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999 33333337777FF377FF3333993370739993333377FF373F377FF3399993000339 993337777F777F3377F3393999707333993337F77737333337FF993399933333 399377F3777FF333377F993339903333399377F33737FF33377F993333707333 399377F333377FF3377F993333101933399377F333777FFF377F993333000993 399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399 99333773FF777F777733339993707339933333773FF7FFF77333333999999999 3333333777333777333333333999993333333333377777333333} NumGlyphs = 2 Style = bsNew end object BitBtn7: TBitBtn Left = 114 Top = 34 Width = 109 Height = 30 Hint = 'Quote Text' Caption = '&Quote' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 6 OnClick = BitBtn7Click Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333FFF333333333333000333333333 3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0 3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF 0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033 33337777773FF733333333333300033333333333337773333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333333333333333333333333333333333330000} NumGlyphs = 2 Style = bsNew end object BitBtn8: TBitBtn Left = 224 Top = 34 Width = 110 Height = 30 Hint = 'CLEARSIG Message' Caption = '&Sign' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 7 OnClick = BitBtn8Click Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 555555555555555555555555555555555555555555FF55555555555559055555 55555555577FF5555555555599905555555555557777F5555555555599905555 555555557777FF5555555559999905555555555777777F555555559999990555 5555557777777FF5555557990599905555555777757777F55555790555599055 55557775555777FF5555555555599905555555555557777F5555555555559905 555555555555777FF5555555555559905555555555555777FF55555555555579 05555555555555777FF5555555555557905555555555555777FF555555555555 59905555555555555777555555555555555555555555555555550000} NumGlyphs = 2 Style = bsNew end object BitBtn9: TBitBtn Left = 334 Top = 34 Width = 110 Height = 30 Hint = 'Sign and Encrypt Message' Caption = 'Sign/Encrypt' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 8 OnClick = BitBtn9Click Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555FFFFF555555555544C4C5555555555F777775FF5555554C444C444 5555555775FF55775F55554C4334444445555575577F55557FF554C4C334C4C4 335557F5577FF55577F554CCC3334444335557555777F555775FCCCCC333CCC4 C4457F55F777F555557F4CC33333CCC444C57F577777F5F5557FC4333333C3C4 CCC57F777777F7FF557F4CC33333333C4C457F577777777F557FCCC33CC4333C C4C575F7755F777FF5755CCCCC3333334C5557F5FF777777F7F554C333333333 CC55575777777777F755553333CC3C33C555557777557577755555533CC4C4CC 5555555775FFFF77555555555C4CCC55555555555777775555550000} NumGlyphs = 2 Style = bsNew end object BitBtn11: TBitBtn Left = 444 Top = 4 Width = 110 Height = 30 Caption = '&Paste/Decrypt' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = BitBtn11Click Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00370777033333 3330337F3F7F33333F3787070003333707303F737773333373F7007703333330 700077337F3333373777887007333337007733F773F333337733700070333333 077037773733333F7F37703707333300080737F373333377737F003333333307 78087733FFF3337FFF7F33300033330008073F3777F33F777F73073070370733 078073F7F7FF73F37FF7700070007037007837773777F73377FF007777700730 70007733FFF77F37377707700077033707307F37773F7FFF7337080777070003 3330737F3F7F777F333778080707770333333F7F737F3F7F3333080787070003 33337F73FF7377733333078000770333333373377733733333330000} NumGlyphs = 2 Style = bsNew end end object Memo1: TMemo Left = 30 Top = 160 Width = 299 Height = 33 TabOrder = 2 Visible = False WordWrap = False end object Mailto: TComboBox Left = 18 Top = 64 Width = 583 Height = 21 DropDownCount = 20 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ItemHeight = 13 ParentFont = False Sorted = True TabOrder = 0 end object Mailtoold2: TEdit Left = 28 Top = 134 Width = 371 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 3 Visible = False end object Memo2: TMemo Left = 30 Top = 110 Width = 523 Height = 45 Lines.Strings = ( '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '') TabOrder = 4 Visible = False WordWrap = False end object StatusBar1: TStatusBar Left = 0 Top = 373 Width = 621 Height = 20 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Panels = < item Text = ' Standby' Width = 200 end item Alignment = taCenter Text = 'PowerPGP 1.34.95 Copyright �1995-1996 Joe Feenin All Rights Rese' + 'rved' Width = 50 end> ParentFont = False SimplePanel = False end object Panel2: TPanel Left = 0 Top = 0 Width = 621 Height = 24 Align = alTop BevelOuter = bvLowered TabOrder = 6 object SpeedButton1: TSpeedButton Left = 1 Top = 1 Width = 22 Height = 22 Hint = 'Open Saved Message' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555555555555555555555555555555555555555555 555555555555555555555555555555555555555FFFFFFFFFF555550000000000 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8 B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555 55555575FFF75555555555700007555555555557777555555555555555555555 55555555555555555555555555555555555555555555555555550000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = OpenMessage1Click end object SpeedButton2: TSpeedButton Left = 23 Top = 1 Width = 22 Height = 22 Hint = 'Save Message' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888 00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888 00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000 00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF 00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF 00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF 00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF 0003737FFFFFFFFF7F73300999999999003337777777777777330000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = SaveMessage1Click end object SpeedButton3: TSpeedButton Left = 67 Top = 1 Width = 22 Height = 22 Hint = 'Edit Signature' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF 00333377737FFFFF7733333033000000033333373377777773330000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = Signature1Click end object SpeedButton4: TSpeedButton Left = 89 Top = 1 Width = 22 Height = 22 Hint = 'ASCII Armor a File' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000003 333333333F777773FF333333008888800333333377333F3773F3333077870787 7033333733337F33373F3308888707888803337F33337F33337F330777880887 7703337F33337FF3337F3308888000888803337F333777F3337F330777700077 7703337F33377733337F33088888888888033373FFFFFFFFFF73333000000000 00333337777777777733333308033308033333337F7F337F7F33333308033308 033333337F7F337F7F33333308033308033333337F73FF737F33333377800087 7333333373F77733733333333088888033333333373FFFF73333333333000003 33333333337777733333333333333333333333333333333333330000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = ASCIIARmorEncryptaFile1Click end object SpeedButton5: TSpeedButton Left = 111 Top = 1 Width = 22 Height = 22 Hint = 'Decrypt an ASCII Armored File' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000003 333333333F777773FF333333008888800333333377333F3773F3333077870787 7033333733337F33373F3308888707888803337F33337F33337F330777880887 7703337F33337FF3337F3308888000888803337F333777F3337F330777700077 7703337F33377733337FB3088888888888033373FFFFFFFFFF733B3000000000 0033333777777777773333BBBB3333080333333333F3337F7F33BBBB707BB308 03333333373F337F7F3333BB08033308033333337F7F337F7F333B3B08033308 033333337F73FF737F33B33B778000877333333373F777337333333B30888880 33333333373FFFF73333333B33000003333333333377777333330000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = DecryptAnASCIIArmoredFile1Click end object SpeedButton6: TSpeedButton Left = 155 Top = 1 Width = 22 Height = 22 Hint = 'Erase Stored Pass Phrase' Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999 3333333777333777FF3333993333339993333377FF3333377FF3399993333339 993337777FF3333377F3393999333333993337F777FF333337FF993399933333 399377F3777FF333377F993339993333399377F33777FF33377F993333999333 399377F333777FF3377F993333399933399377F3333777FF377F993333339993 399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399 99333773FF3333777733339993333339933333773FFFFFF77333333999999999 3333333777333777333333333999993333333333377777333333} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = ClearStoredPassPhrase1Click end object SpeedButton7: TSpeedButton Left = 133 Top = 1 Width = 22 Height = 22 Hint = 'Set Display Font' Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333FFF33FFFFF33333300033000 00333337773377777333333330333300033333337FF33777F333333330733300 0333333377FFF777F33333333700000073333333777777773333333333033000 3333333337FF777F333333333307300033333333377F777F3333333333703007 33333333377F7773333333333330000333333333337777F33333333333300003 33333333337777F3333333333337007333333333337777333333333333330033 3333333333377333333333333333033333333333333733333333333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = Font1Click end object SpeedButton8: TSpeedButton Left = 45 Top = 1 Width = 22 Height = 22 Hint = 'Print Message' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0003377777777777777308888888888888807F33333333333337088888888888 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033 33333337FFFF77333333333000000333333333377777733333330000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = Print1Click end end object Memo3: TMemo Left = 48 Top = 124 Width = 531 Height = 141 Font.Color = clBlack Font.Height = -12 Font.Name = 'Terminal' Font.Style = [] ParentFont = False TabOrder = 7 Visible = False end object MailMsg: TMemo Left = 18 Top = 100 Width = 583 Height = 175 PopupMenu = PopupMenu1 ScrollBars = ssVertical TabOrder = 8 end object Panel3: TPanel Left = 20 Top = 100 Width = 579 Height = 173 BevelInner = bvLowered BevelWidth = 2 BorderWidth = 1 Color = clSilver TabOrder = 9 Visible = False object Image3: TImage Left = 5 Top = 35 Width = 263 Height = 133 Align = alClient Picture.Data = {} Stretch = True end object Label3: TLabel Left = 5 Top = 5 Width = 569 Height = 30 Align = alTop Alignment = taCenter AutoSize = False Caption = 'Decryption Failed !!!' Font.Color = clRed Font.Height = -27 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object Label6: TLabel Left = 268 Top = 35 Width = 306 Height = 133 Align = alRight AutoSize = False Caption = 'Either you have incorrectly entered your pass phrase, the messag' + 'e was not encrypted to you, or the message is not a valid PGP en' + 'crypted message.' Font.Color = clNavy Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object BitBtn10: TBitBtn Left = 356 Top = 122 Width = 205 Height = 35 TabOrder = 0 OnClick = BitBtn10Click Kind = bkOK end end object MainMenu1: TMainMenu Left = 20 Top = 78 object File1: TMenuItem Caption = '&File' ShortCut = 0 object OpenMessage1: TMenuItem Caption = '&Open Message' ShortCut = 16463 OnClick = OpenMessage1Click end object SaveMessage1: TMenuItem Caption = '&Save Message' ShortCut = 16467 OnClick = SaveMessage1Click end object DeleteSavedMessage1: TMenuItem Caption = 'Delete Saved Message' ShortCut = 0 OnClick = DeleteSavedMessage1Click end object N2: TMenuItem Caption = '-' ShortCut = 0 end object Encrypt1: TMenuItem Caption = '&Encrypt' ShortCut = 16453 OnClick = BitBtn1Click end object Decrypt1: TMenuItem Caption = '&Decrypt ' ShortCut = 16452 OnClick = BitBtn2Click end object ClearMessage1: TMenuItem Caption = 'Clear Message Editor' ShortCut = 0 OnClick = ClearMessage1Click end object N1: TMenuItem Caption = '-' ShortCut = 0 end object Print1: TMenuItem Caption = '&Print' ShortCut = 0 OnClick = Print1Click end object N3: TMenuItem Caption = '-' ShortCut = 0 end object ClearStoredPassPhrase1: TMenuItem Caption = '&Clear Stored Pass Phrase' ShortCut = 16464 OnClick = ClearStoredPassPhrase1Click end object N4: TMenuItem Caption = '-' ShortCut = 0 end object Exit1: TMenuItem Caption = 'E&xit' ShortCut = 0 OnClick = Exit1Click end end object Edit1: TMenuItem Caption = 'Edit' ShortCut = 0 object CopyMessageToClipboard1: TMenuItem Caption = '&Copy Message To Clipboard' ShortCut = 0 OnClick = CopyMessageToClipboard1Click end object CutMessageToClipboard1: TMenuItem Caption = 'Cu&t Message To Clipboard' ShortCut = 0 OnClick = CutMessageToClipboard1Click end object PasteMessageFromClipboard1: TMenuItem Caption = '&Paste Message From Clipboard' ShortCut = 0 OnClick = PasteMessageFromClipboard1Click end object N5: TMenuItem Caption = '-' ShortCut = 0 end object Signature1: TMenuItem Caption = '&Signature' ShortCut = 0 OnClick = Signature1Click end end object Displaly1: TMenuItem Caption = 'Display' ShortCut = 0 object Font1: TMenuItem Caption = 'Font' ShortCut = 0 OnClick = Font1Click end object Color1: TMenuItem Caption = 'Color' ShortCut = 0 OnClick = Color1Click end end object KeyManagement1: TMenuItem Caption = '&Key Management' ShortCut = 0 object GenerateSecretPublicKeypair1: TMenuItem Caption = 'Generate Secret/Public Keypair' ShortCut = 0 OnClick = GenerateSecretPublicKeypair1Click end object ImportKeysIntoYourKeyring1: TMenuItem Caption = 'Import Keys Into Your Keyring' ShortCut = 0 OnClick = ImportKeysIntoYourKeyring1Click end object ExportKeysFromYourKeyring1: TMenuItem Caption = 'Export Keys From Your Keyring' ShortCut = 0 OnClick = ExportKeysFromYourKeyring1Click end object RemoveAKeyFromYourKeyring1: TMenuItem Caption = 'Remove A Key From Your Keyring' ShortCut = 0 OnClick = RemoveAKeyFromYourKeyring1Click end object ViewPublicKeyringContents1: TMenuItem Caption = 'View Public Keyring Contents' ShortCut = 0 OnClick = ViewPublicKeyringContents1Click end object ViewSecretKeyringContents1: TMenuItem Caption = 'View Secret Keyring Contents' ShortCut = 0 OnClick = ViewSecretKeyringContents1Click end object UpdagePublicKeyringList1: TMenuItem Caption = 'Update Public Keyring List' ShortCut = 0 OnClick = UpdagePublicKeyringList1Click end end object PGPFileEncryption1: TMenuItem Caption = 'PGP File Encryption' ShortCut = 0 object ASCIIARmorEncryptaFile1: TMenuItem Caption = 'ASCII Armor (Encrypt) a File' ShortCut = 0 OnClick = ASCIIARmorEncryptaFile1Click end object DecryptAnASCIIArmoredFile1: TMenuItem Caption = 'Decrypt An ASCII Armored File' ShortCut = 0 OnClick = DecryptAnASCIIArmoredFile1Click end end object Setup1: TMenuItem Caption = '&Setup' ShortCut = 0 object PGPPath1: TMenuItem Caption = 'PGP Path' ShortCut = 0 OnClick = PGPPath1Click end object PassPhrase1: TMenuItem Caption = 'Pass Phrase' ShortCut = 0 OnClick = PassPhrase1Click end end object Help1: TMenuItem Caption = '&Help' ShortCut = 0 object PowerPGPDics1: TMenuItem Caption = 'PowerPGP Docs' ShortCut = 112 OnClick = PowerPGPDics1Click end object HelpwithPGP1: TMenuItem Caption = 'Help with PGP' ShortCut = 8304 OnClick = HelpwithPGP1Click end object N6: TMenuItem Caption = '-' ShortCut = 0 end object About1: TMenuItem Caption = '&About' ShortCut = 0 OnClick = About1Click end end end object Timer1: TTimer Interval = 50 OnTimer = Timer1Timer Left = 48 Top = 78 end object ColorDialog1: TColorDialog Ctl3D = True Options = [cdPreventFullOpen] Left = 76 Top = 78 end object FontDialog1: TFontDialog Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [fsBold] MinFontSize = 0 MaxFontSize = 0 Left = 104 Top = 78 end object OpenDialog1: TOpenDialog DefaultExt = 'MSG' FileEditStyle = fsEdit Filter = 'Message Files|*.MSG|ASC Files|*.ASC|PGP Files|*.PGP|TXT Files|*.' + 'TXT|All Files|*.*' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Title = 'Open Saved Message' Left = 132 Top = 78 end object SaveDialog1: TSaveDialog DefaultExt = 'MSG' FileEditStyle = fsEdit Filter = 'Message Files|*.MSG|ASC Files|*.ASC|PGP Files|*.PGP|TXT Files|*.' + 'TXT|All Files|*.*' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist] Title = 'Save Message' Left = 158 Top = 78 end object Timer2: TTimer Interval = 60000 OnTimer = Timer2Timer Left = 184 Top = 78 end object PrintDialog1: TPrintDialog Left = 212 Top = 78 end object OpenDialog2: TOpenDialog DefaultExt = 'MSG' FileEditStyle = fsEdit Filter = 'Message Files|*.MSG|Text Files|*.TXT|All Files |*.*' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofFileMustExist] Title = 'Delete a saved message' Left = 240 Top = 78 end object PopupMenu1: TPopupMenu Left = 268 Top = 78 object Cut1: TMenuItem Caption = 'Cut' ShortCut = 0 OnClick = Cut1Click end object CutMessage1: TMenuItem Caption = 'Cut Message' ShortCut = 0 OnClick = CutMessageToClipboard1Click end object Copy1: TMenuItem Caption = 'Copy' ShortCut = 0 OnClick = Copy1Click end object CopyMessage1: TMenuItem Caption = 'Copy Message' ShortCut = 0 OnClick = CopyMessageToClipboard1Click end object Paste1: TMenuItem Caption = 'Paste' ShortCut = 0 OnClick = Paste1Click end object PasteDecrypt1: TMenuItem Caption = 'Paste/Decrypt' ShortCut = 0 OnClick = BitBtn11Click end object PasteMessage1: TMenuItem Caption = 'Paste Message' ShortCut = 0 OnClick = PasteMessageFromClipboard1Click end object Delete1: TMenuItem Caption = 'Delete' ShortCut = 0 OnClick = Delete1Click end object N7: TMenuItem Caption = '-' ShortCut = 0 end object SelectAll1: TMenuItem Caption = 'Select All' ShortCut = 0 OnClick = SelectAll1Click end object N8: TMenuItem Caption = '-' ShortCut = 0 end object EncryptMessage1: TMenuItem Caption = 'Encrypt Message' ShortCut = 0 OnClick = BitBtn1Click end object DecryptMessage1: TMenuItem Caption = 'Decrypt Message' ShortCut = 0 OnClick = BitBtn2Click end object CLEARSIGMessage1: TMenuItem Caption = 'CLEARSIG Message' ShortCut = 0 OnClick = BitBtn8Click end object SignEncryptMessage1: TMenuItem Caption = 'Sign/Encrypt Message' ShortCut = 0 OnClick = BitBtn9Click end end end